home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
dskut
/
decode10.zip
/
DBASE2.RUL
< prev
next >
Wrap
Text File
|
1992-12-07
|
2KB
|
90 lines
############################################################################
# #
# dbase2.rul -- Decode It! rule file for dBASE II DBF files #
# (dBASE is a registered trademark of Borland International) #
# #
# Please note: This rule file is provided as an example only. While #
# every effort has been made to validate the information #
# presented here, Axiom Innovations takes no responsibility #
# for the integrity of the data that results from using #
# this example. #
# #
############################################################################
# dBASE II Header area
RECORD Header
# Version should be equal to 2
TINY Version
WHILE Header.Version <> 2
EXIT
# Number of records in the database
SHORT Record_Number
# Month of last edit date
TINY Month
# Day of last edit date
TINY Day
# Year of last edit date
TINY Year
# Record size in bytes
SHORT Record_Size
END
# Field definitions
RECORD Field 33
# Field name, left justified, zero-filled
WHILE Field.Name <> 13
ASCII Name 11
(OMIT0) Field.Name
# CR is the End of Fields marker
WHILE Field.Name <=> 13
BREAK
# Field type: C, N, L, D, or M
ASCII Type
# Field length
TINY Length
# Field data address (not very useful).
XSHORT Address
# Number of decimals
TINY Decimal_Digits
END
WHILE .OFFSET < 521
TINY Not_Used -1
(OMIT0) Not_Used
# Actual database
RECORD DBASE2_Record Header.Record_Number
# Deleted records contain an asterisk ('*') in first byte
# Normal records contain a space in first byte
ASCII Deleted_Flag
ASCII Info -1
END Header.Record_Size
# End of file
TINY EndOfFile
EXIT